<p fontName="Arial" />

f8f53a2f-4a4f-493b-babf-166e74066634 9 4 5 decimal

&[DATE] &[TIME] - &[FILENAME]

LGS x 2 y * - z + 4 - 2 x * - 4 y * + z - 2 + y z - 3 - 31 sys :

A 33 matrix : b 31 matrix : i 13 range x y z I LGS i el : b i el 000 I : j 13 range A i j el j 1 ≡ j 2 ≡ j 3 ≡ I b i el - : for 31 line for 31 line

A 12 - 12 - 41 - 011 - 33 mat

b 4 - 23 - 31 mat

A 1 -^31221121033 mat

M vars coeffs M.str M num2str : // accept only systems or column vectora M.str sys(findstr 1 - ≡ (M.str sys(findstr length 1 > (| M.str mat(findstr 1 ≡ (M cols 1 ≡ (& M.mat M : invalid input, system or column matrix needed error if M.mat M.str sys(mat(strrep str2num : if // preliminary checks count vars length : count M.mat rows ≠ number of unknowns doesn't match number of equations error go on if // core function vars n f // enable reusable symbolic assignment vars num2str : 1 count range n ≡ vectorize num2str concat str2num M.mat eval 31 line : // initialize the output A count 0 matrix : b vars 0 f : i 1 count range A A vars i f b - augment eval : for A b 12 mat 131 line :

A b Clear 1

LGS 22 y + (* - x + z + 21 x - 2 y * + (* z - 3 y - z + (- 31 sys

A b 12 mat LGS x y z 31 mat coeffs : 12 - 12 - 41 - 011 - 33 mat 4 - 23 - 31 mat 12 mat

A 12 - 12 - 41 - 011 - 33 mat

b 4 - 23 - 31 mat

x A 1 -^b * : 16 - 9 - 6 - 31 mat

M coeffs M.str M num2str : // accept only systems or column vectora M.str sys(findstr 1 - ≡ (M.str sys(findstr length 1 > (| M.str mat(findstr 1 ≡ (M cols 1 ≡ (& M.mat M : invalid input, system or column matrix needed error if M.mat M.str sys(mat(strrep str2num : if // preliminary checks vars M.mat Unknowns : count vars length : count M.mat rows ≠ number of unknowns doesn't match number of equations error go on if // core function vars n f // enable reusable symbolic assignment vars num2str : 1 count range n ≡ vectorize num2str concat str2num M.mat eval 31 line : // initialize the output A count 0 matrix : b vars 0 f : i 1 count range A A vars i f b - augment eval : for A b 12 mat 141 line :

A b x Clear 1

A b 12 mat LGS coeffs : 12 - 12 - 41 - 011 - 33 mat 4 - 23 - 31 mat 12 mat

A 12 - 12 - 41 - 011 - 33 mat

b 4 - 23 - 31 mat

x A 1 -^b * : 16 - 9 - 6 - 31 mat